home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1996 July / WPCJUL96.ISO / file.exe / ARTSFINJ.DXR / 00003_ARTArts frame.ls < prev    next >
Encoding:
Text File  |  1996-05-15  |  448 b   |  22 lines

  1. on exitFrame
  2.   global IFLCanChange, IFLBrowsercounter, browserID, ARTComp
  3.   go(the frame)
  4.   if ARTComp <> 1 then
  5.     ADDAdvertBreak(8)
  6.   end if
  7.   ARTWhichSection()
  8.   ARTSubSection()
  9.   if the mouseUp then
  10.     set IFLCanChange to 1
  11.   end if
  12.   IFLsectionWordAnimate()
  13.   ARTQuitCD()
  14.   if browserID > 32 then
  15.     if IFLBrowsercounter = 2 then
  16.       ARTCheckBrowser()
  17.     else
  18.       set IFLBrowsercounter to 1 + IFLBrowsercounter
  19.     end if
  20.   end if
  21. end
  22.